#!
use Server;

$s=new Server(John,24);
$s->Show;
$s->Say;
print "the result:",$s->Cal(10,20);



